home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / demos / OpenGL / atlantis / whale.c < prev   
Encoding:
C/C++ Source or Header  |  1994-08-02  |  49.5 KB  |  1,819 lines
  1. /*
  2.  * (c) Copyright 1993, 1994, Silicon Graphics, Inc.
  3.  * ALL RIGHTS RESERVED
  4.  * Permission to use, copy, modify, and distribute this software for
  5.  * any purpose and without fee is hereby granted, provided that the above
  6.  * copyright notice appear in all copies and that both the copyright notice
  7.  * and this permission notice appear in supporting documentation, and that
  8.  * the name of Silicon Graphics, Inc. not be used in advertising
  9.  * or publicity pertaining to distribution of the software without specific,
  10.  * written prior permission.
  11.  *
  12.  * THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
  13.  * AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
  14.  * INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
  15.  * FITNESS FOR A PARTICULAR PURPOSE.  IN NO EVENT SHALL SILICON
  16.  * GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
  17.  * SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
  18.  * KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
  19.  * LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
  20.  * THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC.  HAS BEEN
  21.  * ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
  22.  * ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
  23.  * POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
  24.  *
  25.  * US Government Users Restricted Rights
  26.  * Use, duplication, or disclosure by the Government is subject to
  27.  * restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
  28.  * (c)(1)(ii) of the Rights in Technical Data and Computer Software
  29.  * clause at DFARS 252.227-7013 and/or in similar or successor
  30.  * clauses in the FAR or the DOD or NASA FAR Supplement.
  31.  * Unpublished-- rights reserved under the copyright laws of the
  32.  * United States.  Contractor/manufacturer is Silicon Graphics,
  33.  * Inc., 2011 N.  Shoreline Blvd., Mountain View, CA 94039-7311.
  34.  *
  35.  * OpenGL(TM) is a trademark of Silicon Graphics, Inc.
  36.  */
  37. #include <gl.h>
  38. #include <math.h>
  39. #include "atlantis.h"
  40.  
  41.  
  42. static float N001[3] = {0.019249 ,0.011340 ,-0.999750};
  43. static float N002[3] = {-0.132579 ,0.954547 ,0.266952};
  44. static float N003[3] = {-0.196061 ,0.980392 ,-0.019778};
  45. static float N004[3] = {0.695461 ,0.604704 ,0.388158};
  46. static float N005[3] = {0.870600 ,0.425754 ,0.246557};
  47. static float N006[3] = {-0.881191 ,0.392012 ,0.264251};
  48. static float N007[3] = {0.000000 ,1.000000 ,0.000000};
  49. static float N008[3] = {-0.341437 ,0.887477 ,0.309523};
  50. static float N009[3] = {0.124035 ,-0.992278 ,0.000000};
  51. static float N010[3] = {0.242536 ,0.000000 ,-0.970143};
  52. static float N011[3] = {0.588172 ,0.000000 ,0.808736};
  53. static float N012[3] = {0.929824 ,-0.340623 ,-0.139298};
  54. static float N013[3] = {0.954183 ,0.267108 ,-0.134865};
  55. static float N014[3] = {0.495127 ,0.855436 ,-0.151914};
  56. static float N015[3] = {-0.390199 ,0.906569 ,-0.160867};
  57. static float N016[3] = {-0.923605 ,0.354581 ,-0.145692};
  58. static float N017[3] = {-0.955796 ,-0.260667 ,-0.136036};
  59. static float N018[3] = {-0.501283 ,-0.853462 ,-0.142540};
  60. static float N019[3] = {0.405300 ,-0.901974 ,-0.148913};
  61. static float N020[3] = {0.909913 ,-0.392746 ,-0.133451};
  62. static float N021[3] = {0.936494 ,0.331147 ,-0.115414};
  63. static float N022[3] = {0.600131 ,0.793724 ,-0.099222};
  64. static float N023[3] = {-0.231556 ,0.968361 ,-0.093053};
  65. static float N024[3] = {-0.844369 ,0.525330 ,-0.105211};
  66. static float N025[3] = {-0.982725 ,-0.136329 ,-0.125164};
  67. static float N026[3] = {-0.560844 ,-0.822654 ,-0.093241};
  68. static float N027[3] = {0.263884 ,-0.959981 ,-0.093817};
  69. static float N028[3] = {0.842057 ,-0.525192 ,-0.122938};
  70. static float N029[3] = {0.921620 ,0.367565 ,-0.124546};
  71. static float N030[3] = {0.613927 ,0.784109 ,-0.090918};
  72. static float N031[3] = {-0.448754 ,0.888261 ,-0.098037};
  73. static float N032[3] = {-0.891865 ,0.434376 ,-0.126077};
  74. static float N033[3] = {-0.881447 ,-0.448017 ,-0.149437};
  75. static float N034[3] = {-0.345647 ,-0.922057 ,-0.174183};
  76. static float N035[3] = {0.307998 ,-0.941371 ,-0.137688};
  77. static float N036[3] = {0.806316 ,-0.574647 ,-0.140124};
  78. static float N037[3] = {0.961346 ,0.233646 ,-0.145681};
  79. static float N038[3] = {0.488451 ,0.865586 ,-0.110351};
  80. static float N039[3] = {-0.374290 ,0.921953 ,-0.099553};
  81. static float N040[3] = {-0.928504 ,0.344533 ,-0.138485};
  82. static float N041[3] = {-0.918419 ,-0.371792 ,-0.135189};
  83. static float N042[3] = {-0.520666 ,-0.833704 ,-0.183968};
  84. static float N043[3] = {0.339204 ,-0.920273 ,-0.195036};
  85. static float N044[3] = {0.921475 ,-0.387382 ,-0.028636};
  86. static float N045[3] = {0.842465 ,0.533335 ,-0.076204};
  87. static float N046[3] = {0.380110 ,0.924939 ,0.002073};
  88. static float N047[3] = {-0.276128 ,0.961073 ,-0.009579};
  89. static float N048[3] = {-0.879684 ,0.473001 ,-0.049250};
  90. static float N049[3] = {-0.947184 ,-0.317614 ,-0.044321};
  91. static float N050[3] = {-0.642059 ,-0.764933 ,-0.051363};
  92. static float N051[3] = {0.466794 ,-0.880921 ,-0.077990};
  93. static float N052[3] = {0.898509 ,-0.432277 ,0.076279};
  94. static float N053[3] = {0.938985 ,0.328141 ,0.103109};
  95. static float N054[3] = {0.442420 ,0.895745 ,0.043647};
  96. static float N055[3] = {-0.255163 ,0.966723 ,0.018407};
  97. static float N056[3] = {-0.833769 ,0.540650 ,0.111924};
  98. static float N057[3] = {-0.953653 ,-0.289939 ,0.080507};
  99. static float N058[3] = {-0.672357 ,-0.730524 ,0.119461};
  100. static float N059[3] = {0.522249 ,-0.846652 ,0.102157};
  101. static float N060[3] = {0.885868 ,-0.427631 ,0.179914};
  102. static float N061[3] = {0.000000 ,1.000000 ,0.000000};
  103. static float N062[3] = {0.648942 ,0.743116 ,0.163255};
  104. static float N063[3] = {-0.578967 ,0.807730 ,0.111219};
  105. static float N064[3] = {0.000000 ,1.000000 ,0.000000};
  106. static float N065[3] = {-0.909864 ,-0.352202 ,0.219321};
  107. static float N066[3] = {-0.502541 ,-0.818090 ,0.279610};
  108. static float N067[3] = {0.322919 ,-0.915358 ,0.240504};
  109. static float N068[3] = {0.242536 ,0.000000 ,-0.970143};
  110. static float N069[3] = {0.000000 ,1.000000 ,0.000000};
  111. static float N070[3] = {0.000000 ,1.000000 ,0.000000};
  112. static float N071[3] = {0.000000 ,1.000000 ,0.000000};
  113. static float N072[3] = {0.000000 ,1.000000 ,0.000000};
  114. static float N073[3] = {0.000000 ,1.000000 ,0.000000};
  115. static float N074[3] = {0.000000 ,1.000000 ,0.000000};
  116. static float N075[3] = {0.031220 ,0.999025 ,-0.031220};
  117. static float N076[3] = {0.000000 ,1.000000 ,0.000000};
  118. static float N077[3] = {0.446821 ,0.893642 ,0.041889};
  119. static float N078[3] = {0.863035 ,-0.100980 ,0.494949};
  120. static float N079[3] = {0.585597 ,-0.808215 ,0.062174};
  121. static float N080[3] = {0.000000 ,1.000000 ,0.000000};
  122. static float N081[3] = {1.000000 ,0.000000 ,0.000000};
  123. static float N082[3] = {0.000000 ,1.000000 ,0.000000};
  124. static float N083[3] = {-1.000000 ,0.000000 ,0.000000};
  125. static float N084[3] = {-0.478893 ,0.837129 ,-0.264343};
  126. static float N085[3] = {0.000000 ,1.000000 ,0.000000};
  127. static float N086[3] = {0.763909 ,0.539455 ,-0.354163};
  128. static float N087[3] = {0.446821 ,0.893642 ,0.041889};
  129. static float N088[3] = {0.385134 ,-0.908288 ,0.163352};
  130. static float N089[3] = {-0.605952 ,0.779253 ,-0.159961};
  131. static float N090[3] = {0.000000 ,1.000000 ,0.000000};
  132. static float N091[3] = {0.000000 ,1.000000 ,0.000000};
  133. static float N092[3] = {0.000000 ,1.000000 ,0.000000};
  134. static float N093[3] = {0.000000 ,1.000000 ,0.000000};
  135. static float N094[3] = {1.000000 ,0.000000 ,0.000000};
  136. static float N095[3] = {-1.000000 ,0.000000 ,0.000000};
  137. static float N096[3] = {0.644444 ,-0.621516 ,0.445433};
  138. static float N097[3] = {-0.760896 ,-0.474416 ,0.442681};
  139. static float N098[3] = {0.636888 ,-0.464314 ,0.615456};
  140. static float N099[3] = {-0.710295 ,0.647038 ,0.277168};
  141. static float N100[3] = {0.009604 ,0.993655 ,0.112063};
  142. static float N101[3] = {0.000000 ,1.000000 ,0.000000};
  143. static float N102[3] = {0.000000 ,1.000000 ,0.000000};
  144. static float N103[3] = {0.000000 ,1.000000 ,0.000000};
  145. static float N104[3] = {0.031837 ,0.999285 ,0.020415};
  146. static float N105[3] = {0.031837 ,0.999285 ,0.020415};
  147. static float N106[3] = {0.031837 ,0.999285 ,0.020415};
  148. static float N107[3] = {0.014647 ,0.999648 ,0.022115};
  149. static float N108[3] = {0.014647 ,0.999648 ,0.022115};
  150. static float N109[3] = {0.014647 ,0.999648 ,0.022115};
  151. static float N110[3] = {-0.985141 ,0.039475 ,0.167149};
  152. static float N111[3] = {-0.985141 ,0.039475 ,0.167149};
  153. static float N112[3] = {-0.985141 ,0.039475 ,0.167149};
  154. static float N113[3] = {0.000000 ,1.000000 ,0.000000};
  155. static float N114[3] = {0.000000 ,1.000000 ,0.000000};
  156. static float N115[3] = {0.000000 ,1.000000 ,0.000000};
  157. static float N116[3] = {0.000000 ,1.000000 ,0.000000};
  158. static float N117[3] = {0.000000 ,1.000000 ,0.000000};
  159. static float N118[3] = {0.000000 ,1.000000 ,0.000000};
  160. static float N119[3] = {0.000000 ,1.000000 ,0.000000};
  161. static float N120[3] = {0.000000 ,1.000000 ,0.000000};
  162. static float N121[3] = {0.000000 ,1.000000 ,0.000000};
  163. static float iP001[3] = {18.74, 13.19, 3.76};
  164. static float P001[3] = {18.74, 13.19, 3.76};
  165. static float P002[3] = {0.00, 390.42, 10292.57};
  166. static float P003[3] = {55.80, 622.31, 8254.35};
  167. static float P004[3] = {20.80, 247.66, 10652.13};
  168. static float P005[3] = {487.51, 198.05, 9350.78};
  169. static float P006[3] = {-457.61, 199.04, 9353.01};
  170. static float P007[3] = {0.00, 259.00, 10276.27};
  171. static float P008[3] = {-34.67, 247.64, 10663.71};
  172. static float iP009[3] = {97.46, 67.63, 593.82};
  173. static float iP010[3] = {-84.33, 67.63, 588.18};
  174. static float iP011[3] = {118.69, 8.98, -66.91};
  175. static float P009[3] = {97.46, 67.63, 593.82};
  176. static float P010[3] = {-84.33, 67.63, 588.18};
  177. static float P011[3] = {118.69, 8.98, -66.91};
  178. static float iP012[3] = {156.48, -31.95, 924.54};
  179. static float iP013[3] = {162.00, 110.22, 924.54};
  180. static float iP014[3] = {88.16, 221.65, 924.54};
  181. static float iP015[3] = {-65.21, 231.16, 924.54};
  182. static float iP016[3] = {-156.48, 121.97, 924.54};
  183. static float iP017[3] = {-162.00, -23.93, 924.54};
  184. static float iP018[3] = {-88.16, -139.10, 924.54};
  185. static float iP019[3] = {65.21, -148.61, 924.54};
  186. static float iP020[3] = {246.87, -98.73, 1783.04};
  187. static float iP021[3] = {253.17, 127.76, 1783.04};
  188. static float iP022[3] = {132.34, 270.77, 1783.04};
  189. static float iP023[3] = {-97.88, 285.04, 1783.04};
  190. static float iP024[3] = {-222.97, 139.80, 1783.04};
  191. static float iP025[3] = {-225.29, -86.68, 1783.04};
  192. static float iP026[3] = {-108.44, -224.15, 1783.04};
  193. static float iP027[3] = {97.88, -221.56, 1783.04};
  194. static float iP028[3] = {410.55, -200.66, 3213.87};
  195. static float iP029[3] = {432.19, 148.42, 3213.87};
  196. static float iP030[3] = {200.66, 410.55, 3213.87};
  197. static float iP031[3] = {-148.42, 432.19, 3213.87};
  198. static float iP032[3] = {-407.48, 171.88, 3213.87};
  199. static float iP033[3] = {-432.19, -148.42, 3213.87};
  200. static float iP034[3] = {-148.88, -309.74, 3213.87};
  201. static float iP035[3] = {156.38, -320.17, 3213.87};
  202. static float iP036[3] = {523.39, -303.81, 4424.57};
  203. static float iP037[3] = {574.66, 276.84, 4424.57};
  204. static float iP038[3] = {243.05, 492.50, 4424.57};
  205. static float iP039[3] = {-191.23, 520.13, 4424.57};
  206. static float iP040[3] = {-523.39, 304.01, 4424.57};
  207. static float iP041[3] = {-574.66, -231.83, 4424.57};
  208. static float iP042[3] = {-266.95, -578.17, 4424.57};
  209. static float iP043[3] = {211.14, -579.67, 4424.57};
  210. static float iP044[3] = {680.57, -370.27, 5943.46};
  211. static float iP045[3] = {834.01, 363.09, 5943.46};
  212. static float iP046[3] = {371.29, 614.13, 5943.46};
  213. static float iP047[3] = {-291.43, 621.86, 5943.46};
  214. static float iP048[3] = {-784.13, 362.60, 5943.46};
  215. static float iP049[3] = {-743.29, -325.82, 5943.46};
  216. static float iP050[3] = {-383.24, -804.77, 5943.46};
  217. static float iP051[3] = {283.47, -846.09, 5943.46};
  218. static float P012[3] = {156.48, -31.95, 924.54};
  219. static float P013[3] = {162.00, 110.22, 924.54};
  220. static float P014[3] = {88.16, 221.65, 924.54};
  221. static float P015[3] = {-65.21, 231.16, 924.54};
  222. static float P016[3] = {-156.48, 121.97, 924.54};
  223. static float P017[3] = {-162.00, -23.93, 924.54};
  224. static float P018[3] = {-88.16, -139.10, 924.54};
  225. static float P019[3] = {65.21, -148.61, 924.54};
  226. static float P020[3] = {246.87, -98.73, 1783.04};
  227. static float P021[3] = {253.17, 127.76, 1783.04};
  228. static float P022[3] = {132.34, 270.77, 1783.04};
  229. static float P023[3] = {-97.88, 285.04, 1783.04};
  230. static float P024[3] = {-222.97, 139.80, 1783.04};
  231. static float P025[3] = {-225.29, -86.68, 1783.04};
  232. static float P026[3] = {-108.44, -224.15, 1783.04};
  233. static float P027[3] = {97.88, -221.56, 1783.04};
  234. static float P028[3] = {410.55, -200.66, 3213.87};
  235. static float P029[3] = {432.19, 148.42, 3213.87};
  236. static float P030[3] = {200.66, 410.55, 3213.87};
  237. static float P031[3] = {-148.42, 432.19, 3213.87};
  238. static float P032[3] = {-407.48, 171.88, 3213.87};
  239. static float P033[3] = {-432.19, -148.42, 3213.87};
  240. static float P034[3] = {-148.88, -309.74, 3213.87};
  241. static float P035[3] = {156.38, -320.17, 3213.87};
  242. static float P036[3] = {523.39, -303.81, 4424.57};
  243. static float P037[3] = {574.66, 276.84, 4424.57};
  244. static float P038[3] = {243.05, 492.50, 4424.57};
  245. static float P039[3] = {-191.23, 520.13, 4424.57};
  246. static float P040[3] = {-523.39, 304.01, 4424.57};
  247. static float P041[3] = {-574.66, -231.83, 4424.57};
  248. static float P042[3] = {-266.95, -578.17, 4424.57};
  249. static float P043[3] = {211.14, -579.67, 4424.57};
  250. static float P044[3] = {680.57, -370.27, 5943.46};
  251. static float P045[3] = {834.01, 363.09, 5943.46};
  252. static float P046[3] = {371.29, 614.13, 5943.46};
  253. static float P047[3] = {-291.43, 621.86, 5943.46};
  254. static float P048[3] = {-784.13, 362.60, 5943.46};
  255. static float P049[3] = {-743.29, -325.82, 5943.46};
  256. static float P050[3] = {-383.24, -804.77, 5943.46};
  257. static float P051[3] = {283.47, -846.09, 5943.46};
  258. static float P052[3] = {599.09, -332.24, 7902.59};
  259. static float P053[3] = {735.48, 306.26, 7911.92};
  260. static float P054[3] = {321.55, 558.53, 7902.59};
  261. static float P055[3] = {-260.54, 559.84, 7902.59};
  262. static float P056[3] = {-698.66, 320.83, 7902.59};
  263. static float P057[3] = {-643.29, -299.16, 7902.59};
  264. static float P058[3] = {-341.47, -719.30, 7902.59};
  265. static float P059[3] = {252.57, -756.12, 7902.59};
  266. static float P060[3] = {458.39, -265.31, 9355.44};
  267. static float iP061[3] = {353.63, 138.70, 10214.20};
  268. static float P061[3] = {353.63, 138.70, 10214.20};
  269. static float P062[3] = {224.04, 438.98, 9364.77};
  270. static float P063[3] = {-165.71, 441.27, 9355.44};
  271. static float iP064[3] = {-326.40, 162.04, 10209.54};
  272. static float P064[3] = {-326.40, 162.04, 10209.54};
  273. static float P065[3] = {-473.99, -219.71, 9355.44};
  274. static float P066[3] = {-211.97, -479.87, 9355.44};
  275. static float P067[3] = {192.86, -504.03, 9355.44};
  276. static float iP068[3] = {-112.44, 9.25, -64.42};
  277. static float iP069[3] = {1155.63, 0.00, -182.46};
  278. static float iP070[3] = {-1143.13, 0.00, -181.54};
  279. static float iP071[3] = {1424.23, 0.00, -322.09};
  280. static float iP072[3] = {-1368.01, 0.00, -310.38};
  281. static float iP073[3] = {1255.57, 2.31, 114.05};
  282. static float iP074[3] = {-1149.38, 0.00, 117.12};
  283. static float iP075[3] = {718.36, 0.00, 433.36};
  284. static float iP076[3] = {-655.90, 0.00, 433.36};
  285. static float P068[3] = {-112.44, 9.25, -64.42};
  286. static float P069[3] = {1155.63, 0.00, -182.46};
  287. static float P070[3] = {-1143.13, 0.00, -181.54};
  288. static float P071[3] = {1424.23, 0.00, -322.09};
  289. static float P072[3] = {-1368.01, 0.00, -310.38};
  290. static float P073[3] = {1255.57, 2.31, 114.05};
  291. static float P074[3] = {-1149.38, 0.00, 117.12};
  292. static float P075[3] = {718.36, 0.00, 433.36};
  293. static float P076[3] = {-655.90, 0.00, 433.36};
  294. static float P077[3] = {1058.00, -2.66, 7923.51};
  295. static float P078[3] = {-1016.51, -15.47, 7902.87};
  296. static float P079[3] = {-1363.99, -484.50, 7593.38};
  297. static float P080[3] = {1478.09, -861.47, 7098.12};
  298. static float P081[3] = {1338.06, -284.68, 7024.15};
  299. static float P082[3] = {-1545.51, -860.64, 7106.60};
  300. static float P083[3] = {1063.19, -70.46, 7466.60};
  301. static float P084[3] = {-1369.18, -288.11, 7015.34};
  302. static float P085[3] = {1348.44, -482.50, 7591.41};
  303. static float P086[3] = {-1015.45, -96.80, 7474.86};
  304. static float P087[3] = {731.04, 148.38, 7682.58};
  305. static float P088[3] = {-697.03, 151.82, 7668.81};
  306. static float P089[3] = {-686.82, 157.09, 7922.29};
  307. static float P090[3] = {724.73, 147.75, 7931.39};
  308. static float iP091[3] = {0.00, 327.10, 2346.55};
  309. static float iP092[3] = {0.00, 552.28, 2311.31};
  310. static float iP093[3] = {0.00, 721.16, 2166.41};
  311. static float iP094[3] = {0.00, 693.42, 2388.80};
  312. static float iP095[3] = {0.00, 389.44, 2859.97};
  313. static float P091[3] = {0.00, 327.10, 2346.55};
  314. static float P092[3] = {0.00, 552.28, 2311.31};
  315. static float P093[3] = {0.00, 721.16, 2166.41};
  316. static float P094[3] = {0.00, 693.42, 2388.80};
  317. static float P095[3] = {0.00, 389.44, 2859.97};
  318. static float iP096[3] = {222.02, -183.67, 10266.89};
  319. static float iP097[3] = {-128.90, -182.70, 10266.89};
  320. static float iP098[3] = {41.04, 88.31, 10659.36};
  321. static float iP099[3] = {-48.73, 88.30, 10659.36};
  322. static float P096[3] = {222.02, -183.67, 10266.89};
  323. static float P097[3] = {-128.90, -182.70, 10266.89};
  324. static float P098[3] = {41.04, 88.31, 10659.36};
  325. static float P099[3] = {-48.73, 88.30, 10659.36};
  326. static float P100[3] = {0.00, 603.42, 9340.68};
  327. static float P101[3] = {5.70, 567.00, 7862.98};
  328. static float P102[3] = {521.61, 156.61, 9162.34};
  329. static float P103[3] = {83.68, 566.67, 7861.26};
  330. static float P104[3] = {-9.86, 567.62, 7858.65};
  331. static float P105[3] = {31.96, 565.27, 7908.46};
  332. static float P106[3] = {22.75, 568.13, 7782.83};
  333. static float P107[3] = {58.93, 568.42, 7775.94};
  334. static float P108[3] = {55.91, 565.59, 7905.86};
  335. static float P109[3] = {99.21, 566.00, 7858.65};
  336. static float P110[3] = {-498.83, 148.14, 9135.10};
  337. static float P111[3] = {-495.46, 133.24, 9158.48};
  338. static float P112[3] = {-490.82, 146.23, 9182.76};
  339. static float P113[3] = {-489.55, 174.11, 9183.66};
  340. static float P114[3] = {-492.92, 189.00, 9160.28};
  341. static float P115[3] = {-497.56, 176.02, 9136.00};
  342. static float P116[3] = {526.54, 169.68, 9137.70};
  343. static float P117[3] = {523.49, 184.85, 9161.42};
  344. static float P118[3] = {518.56, 171.78, 9186.06};
  345. static float P119[3] = {516.68, 143.53, 9186.98};
  346. static float P120[3] = {519.73, 128.36, 9163.26};
  347. static float P121[3] = {524.66, 141.43, 9138.62};
  348.  
  349.  
  350. void Whale001(void)
  351. {
  352.  
  353.     glBegin(GL_POLYGON);
  354.     glNormal3fv(N001);
  355.     glVertex3fv(P001);
  356.     glNormal3fv(N068);
  357.     glVertex3fv(P068);
  358.     glNormal3fv(N010);
  359.     glVertex3fv(P010);
  360.     glEnd();
  361.     glBegin(GL_POLYGON);
  362.     glNormal3fv(N068);
  363.     glVertex3fv(P068);
  364.     glNormal3fv(N076);
  365.     glVertex3fv(P076);
  366.     glNormal3fv(N010);
  367.     glVertex3fv(P010);
  368.     glEnd();
  369.     glBegin(GL_POLYGON);
  370.     glNormal3fv(N068);
  371.     glVertex3fv(P068);
  372.     glNormal3fv(N070);
  373.     glVertex3fv(P070);
  374.     glNormal3fv(N076);
  375.     glVertex3fv(P076);
  376.     glEnd();
  377.     glBegin(GL_POLYGON);
  378.     glNormal3fv(N076);
  379.     glVertex3fv(P076);
  380.     glNormal3fv(N070);
  381.     glVertex3fv(P070);
  382.     glNormal3fv(N074);
  383.     glVertex3fv(P074);
  384.     glEnd();
  385.     glBegin(GL_POLYGON);
  386.     glNormal3fv(N070);
  387.     glVertex3fv(P070);
  388.     glNormal3fv(N072);
  389.     glVertex3fv(P072);
  390.     glNormal3fv(N074);
  391.     glVertex3fv(P074);
  392.     glEnd();
  393.     glBegin(GL_POLYGON);
  394.     glNormal3fv(N072);
  395.     glVertex3fv(P072);
  396.     glNormal3fv(N070);
  397.     glVertex3fv(P070);
  398.     glNormal3fv(N074);
  399.     glVertex3fv(P074);
  400.     glEnd();
  401.     glBegin(GL_POLYGON);
  402.     glNormal3fv(N074);
  403.     glVertex3fv(P074);
  404.     glNormal3fv(N070);
  405.     glVertex3fv(P070);
  406.     glNormal3fv(N076);
  407.     glVertex3fv(P076);
  408.     glEnd();
  409.     glBegin(GL_POLYGON);
  410.     glNormal3fv(N070);
  411.     glVertex3fv(P070);
  412.     glNormal3fv(N068);
  413.     glVertex3fv(P068);
  414.     glNormal3fv(N076);
  415.     glVertex3fv(P076);
  416.     glEnd();
  417.     glBegin(GL_POLYGON);
  418.     glNormal3fv(N076);
  419.     glVertex3fv(P076);
  420.     glNormal3fv(N068);
  421.     glVertex3fv(P068);
  422.     glNormal3fv(N010);
  423.     glVertex3fv(P010);
  424.     glEnd();
  425.     glBegin(GL_POLYGON);
  426.     glNormal3fv(N068);
  427.     glVertex3fv(P068);
  428.     glNormal3fv(N001);
  429.     glVertex3fv(P001);
  430.     glNormal3fv(N010);
  431.     glVertex3fv(P010);
  432.     glEnd();
  433. }
  434.  
  435. void Whale002(void)
  436. {
  437.     glBegin(GL_POLYGON);
  438.     glNormal3fv(N011);
  439.     glVertex3fv(P011);
  440.     glNormal3fv(N001);
  441.     glVertex3fv(P001);
  442.     glNormal3fv(N009);
  443.     glVertex3fv(P009);
  444.     glEnd();
  445.     glBegin(GL_POLYGON);
  446.     glNormal3fv(N075);
  447.     glVertex3fv(P075);
  448.     glNormal3fv(N011);
  449.     glVertex3fv(P011);
  450.     glNormal3fv(N009);
  451.     glVertex3fv(P009);
  452.     glEnd();
  453.     glBegin(GL_POLYGON);
  454.     glNormal3fv(N069);
  455.     glVertex3fv(P069);
  456.     glNormal3fv(N011);
  457.     glVertex3fv(P011);
  458.     glNormal3fv(N075);
  459.     glVertex3fv(P075);
  460.     glEnd();
  461.     glBegin(GL_POLYGON);
  462.     glNormal3fv(N069);
  463.     glVertex3fv(P069);
  464.     glNormal3fv(N075);
  465.     glVertex3fv(P075);
  466.     glNormal3fv(N073);
  467.     glVertex3fv(P073);
  468.     glEnd();
  469.     glBegin(GL_POLYGON);
  470.     glNormal3fv(N071);
  471.     glVertex3fv(P071);
  472.     glNormal3fv(N069);
  473.     glVertex3fv(P069);
  474.     glNormal3fv(N073);
  475.     glVertex3fv(P073);
  476.     glEnd();
  477.     glBegin(GL_POLYGON);
  478.     glNormal3fv(N001);
  479.     glVertex3fv(P001);
  480.     glNormal3fv(N011);
  481.     glVertex3fv(P011);
  482.     glNormal3fv(N009);
  483.     glVertex3fv(P009);
  484.     glEnd();
  485.     glBegin(GL_POLYGON);
  486.     glNormal3fv(N009);
  487.     glVertex3fv(P009);
  488.     glNormal3fv(N011);
  489.     glVertex3fv(P011);
  490.     glNormal3fv(N075);
  491.     glVertex3fv(P075);
  492.     glEnd();
  493.     glBegin(GL_POLYGON);
  494.     glNormal3fv(N011);
  495.     glVertex3fv(P011);
  496.     glNormal3fv(N069);
  497.     glVertex3fv(P069);
  498.     glNormal3fv(N075);
  499.     glVertex3fv(P075);
  500.     glEnd();
  501.     glBegin(GL_POLYGON);
  502.     glNormal3fv(N069);
  503.     glVertex3fv(P069);
  504.     glNormal3fv(N073);
  505.     glVertex3fv(P073);
  506.     glNormal3fv(N075);
  507.     glVertex3fv(P075);
  508.     glEnd();
  509.     glBegin(GL_POLYGON);
  510.     glNormal3fv(N069);
  511.     glVertex3fv(P069);
  512.     glNormal3fv(N071);
  513.     glVertex3fv(P071);
  514.     glNormal3fv(N073);
  515.     glVertex3fv(P073);
  516.     glEnd();
  517. }
  518.  
  519. void Whale003(void)
  520. {
  521.     glBegin(GL_POLYGON);
  522.     glNormal3fv(N018);
  523.     glVertex3fv(P018);
  524.     glNormal3fv(N001);
  525.     glVertex3fv(P001);
  526.     glNormal3fv(N019);
  527.     glVertex3fv(P019);
  528.     glEnd();
  529.     glBegin(GL_POLYGON);
  530.     glNormal3fv(N019);
  531.     glVertex3fv(P019);
  532.     glNormal3fv(N001);
  533.     glVertex3fv(P001);
  534.     glNormal3fv(N012);
  535.     glVertex3fv(P012);
  536.     glEnd();
  537.     glBegin(GL_POLYGON);
  538.     glNormal3fv(N017);
  539.     glVertex3fv(P017);
  540.     glNormal3fv(N001);
  541.     glVertex3fv(P001);
  542.     glNormal3fv(N018);
  543.     glVertex3fv(P018);
  544.     glEnd();
  545.     glBegin(GL_POLYGON);
  546.     glNormal3fv(N001);
  547.     glVertex3fv(P001);
  548.     glNormal3fv(N017);
  549.     glVertex3fv(P017);
  550.     glNormal3fv(N016);
  551.     glVertex3fv(P016);
  552.     glEnd();
  553.     glBegin(GL_POLYGON);
  554.     glNormal3fv(N001);
  555.     glVertex3fv(P001);
  556.     glNormal3fv(N013);
  557.     glVertex3fv(P013);
  558.     glNormal3fv(N012);
  559.     glVertex3fv(P012);
  560.     glEnd();
  561.     glBegin(GL_POLYGON);
  562.     glNormal3fv(N001);
  563.     glVertex3fv(P001);
  564.     glNormal3fv(N016);
  565.     glVertex3fv(P016);
  566.     glNormal3fv(N015);
  567.     glVertex3fv(P015);
  568.     glEnd();
  569.     glBegin(GL_POLYGON);
  570.     glNormal3fv(N001);
  571.     glVertex3fv(P001);
  572.     glNormal3fv(N014);
  573.     glVertex3fv(P014);
  574.     glNormal3fv(N013);
  575.     glVertex3fv(P013);
  576.     glEnd();
  577.     glBegin(GL_POLYGON);
  578.     glNormal3fv(N001);
  579.     glVertex3fv(P001);
  580.     glNormal3fv(N015);
  581.     glVertex3fv(P015);
  582.     glNormal3fv(N014);
  583.     glVertex3fv(P014);
  584.     glEnd();
  585. }
  586.  
  587. void Whale004(void)
  588. {
  589.     glBegin(GL_POLYGON);
  590.     glNormal3fv(N014);
  591.     glVertex3fv(P014);
  592.     glNormal3fv(N015);
  593.     glVertex3fv(P015);
  594.     glNormal3fv(N023);
  595.     glVertex3fv(P023);
  596.     glNormal3fv(N022);
  597.     glVertex3fv(P022);
  598.     glEnd();
  599.     glBegin(GL_POLYGON);
  600.     glNormal3fv(N015);
  601.     glVertex3fv(P015);
  602.     glNormal3fv(N016);
  603.     glVertex3fv(P016);
  604.     glNormal3fv(N024);
  605.     glVertex3fv(P024);
  606.     glNormal3fv(N023);
  607.     glVertex3fv(P023);
  608.     glEnd();
  609.     glBegin(GL_POLYGON);
  610.     glNormal3fv(N016);
  611.     glVertex3fv(P016);
  612.     glNormal3fv(N017);
  613.     glVertex3fv(P017);
  614.     glNormal3fv(N025);
  615.     glVertex3fv(P025);
  616.     glNormal3fv(N024);
  617.     glVertex3fv(P024);
  618.     glEnd();
  619.     glBegin(GL_POLYGON);
  620.     glNormal3fv(N017);
  621.     glVertex3fv(P017);
  622.     glNormal3fv(N018);
  623.     glVertex3fv(P018);
  624.     glNormal3fv(N026);
  625.     glVertex3fv(P026);
  626.     glNormal3fv(N025);
  627.     glVertex3fv(P025);
  628.     glEnd();
  629.     glBegin(GL_POLYGON);
  630.     glNormal3fv(N013);
  631.     glVertex3fv(P013);
  632.     glNormal3fv(N014);
  633.     glVertex3fv(P014);
  634.     glNormal3fv(N022);
  635.     glVertex3fv(P022);
  636.     glNormal3fv(N021);
  637.     glVertex3fv(P021);
  638.     glEnd();
  639.     glBegin(GL_POLYGON);
  640.     glNormal3fv(N012);
  641.     glVertex3fv(P012);
  642.     glNormal3fv(N013);
  643.     glVertex3fv(P013);
  644.     glNormal3fv(N021);
  645.     glVertex3fv(P021);
  646.     glNormal3fv(N020);
  647.     glVertex3fv(P020);
  648.     glEnd();
  649.     glBegin(GL_POLYGON);
  650.     glNormal3fv(N018);
  651.     glVertex3fv(P018);
  652.     glNormal3fv(N019);
  653.     glVertex3fv(P019);
  654.     glNormal3fv(N027);
  655.     glVertex3fv(P027);
  656.     glNormal3fv(N026);
  657.     glVertex3fv(P026);
  658.     glEnd();
  659.     glBegin(GL_POLYGON);
  660.     glNormal3fv(N019);
  661.     glVertex3fv(P019);
  662.     glNormal3fv(N012);
  663.     glVertex3fv(P012);
  664.     glNormal3fv(N020);
  665.     glVertex3fv(P020);
  666.     glNormal3fv(N027);
  667.     glVertex3fv(P027);
  668.     glEnd();
  669. }
  670.  
  671. void Whale005(void)
  672. {
  673.     glBegin(GL_POLYGON);
  674.     glNormal3fv(N022);
  675.     glVertex3fv(P022);
  676.     glNormal3fv(N023);
  677.     glVertex3fv(P023);
  678.     glNormal3fv(N031);
  679.     glVertex3fv(P031);
  680.     glNormal3fv(N030);
  681.     glVertex3fv(P030);
  682.     glEnd();
  683.     glBegin(GL_POLYGON);
  684.     glNormal3fv(N021);
  685.     glVertex3fv(P021);
  686.     glNormal3fv(N022);
  687.     glVertex3fv(P022);
  688.     glNormal3fv(N030);
  689.     glVertex3fv(P030);
  690.     glEnd();
  691.     glBegin(GL_POLYGON);
  692.     glNormal3fv(N021);
  693.     glVertex3fv(P021);
  694.     glNormal3fv(N030);
  695.     glVertex3fv(P030);
  696.     glNormal3fv(N029);
  697.     glVertex3fv(P029);
  698.     glEnd();
  699.     glBegin(GL_POLYGON);
  700.     glNormal3fv(N023);
  701.     glVertex3fv(P023);
  702.     glNormal3fv(N024);
  703.     glVertex3fv(P024);
  704.     glNormal3fv(N031);
  705.     glVertex3fv(P031);
  706.     glEnd();
  707.     glBegin(GL_POLYGON);
  708.     glNormal3fv(N024);
  709.     glVertex3fv(P024);
  710.     glNormal3fv(N032);
  711.     glVertex3fv(P032);
  712.     glNormal3fv(N031);
  713.     glVertex3fv(P031);
  714.     glEnd();
  715.     glBegin(GL_POLYGON);
  716.     glNormal3fv(N024);
  717.     glVertex3fv(P024);
  718.     glNormal3fv(N025);
  719.     glVertex3fv(P025);
  720.     glNormal3fv(N032);
  721.     glVertex3fv(P032);
  722.     glEnd();
  723.     glBegin(GL_POLYGON);
  724.     glNormal3fv(N025);
  725.     glVertex3fv(P025);
  726.     glNormal3fv(N033);
  727.     glVertex3fv(P033);
  728.     glNormal3fv(N032);
  729.     glVertex3fv(P032);
  730.     glEnd();
  731.     glBegin(GL_POLYGON);
  732.     glNormal3fv(N020);
  733.     glVertex3fv(P020);
  734.     glNormal3fv(N021);
  735.     glVertex3fv(P021);
  736.     glNormal3fv(N029);
  737.     glVertex3fv(P029);
  738.     glEnd();
  739.     glBegin(GL_POLYGON);
  740.     glNormal3fv(N020);
  741.     glVertex3fv(P020);
  742.     glNormal3fv(N029);
  743.     glVertex3fv(P029);
  744.     glNormal3fv(N028);
  745.     glVertex3fv(P028);
  746.     glEnd();
  747.     glBegin(GL_POLYGON);
  748.     glNormal3fv(N027);
  749.     glVertex3fv(P027);
  750.     glNormal3fv(N020);
  751.     glVertex3fv(P020);
  752.     glNormal3fv(N028);
  753.     glVertex3fv(P028);
  754.     glEnd();
  755.     glBegin(GL_POLYGON);
  756.     glNormal3fv(N027);
  757.     glVertex3fv(P027);
  758.     glNormal3fv(N028);
  759.     glVertex3fv(P028);
  760.     glNormal3fv(N035);
  761.     glVertex3fv(P035);
  762.     glEnd();
  763.     glBegin(GL_POLYGON);
  764.     glNormal3fv(N025);
  765.     glVertex3fv(P025);
  766.     glNormal3fv(N026);
  767.     glVertex3fv(P026);
  768.     glNormal3fv(N033);
  769.     glVertex3fv(P033);
  770.     glEnd();
  771.     glBegin(GL_POLYGON);
  772.     glNormal3fv(N033);
  773.     glVertex3fv(P033);
  774.     glNormal3fv(N026);
  775.     glVertex3fv(P026);
  776.     glNormal3fv(N034);
  777.     glVertex3fv(P034);
  778.     glEnd();
  779.     glBegin(GL_POLYGON);
  780.     glNormal3fv(N026);
  781.     glVertex3fv(P026);
  782.     glNormal3fv(N027);
  783.     glVertex3fv(P027);
  784.     glNormal3fv(N035);
  785.     glVertex3fv(P035);
  786.     glNormal3fv(N034);
  787.     glVertex3fv(P034);
  788.     glEnd();
  789. }
  790.  
  791. void Whale006(void)
  792. {
  793.     glBegin(GL_POLYGON);
  794.     glNormal3fv(N092);
  795.     glVertex3fv(P092);
  796.     glNormal3fv(N093);
  797.     glVertex3fv(P093);
  798.     glNormal3fv(N094);
  799.     glVertex3fv(P094);
  800.     glEnd();
  801.     glBegin(GL_POLYGON);
  802.     glNormal3fv(N093);
  803.     glVertex3fv(P093);
  804.     glNormal3fv(N092);
  805.     glVertex3fv(P092);
  806.     glNormal3fv(N094);
  807.     glVertex3fv(P094);
  808.     glEnd();
  809.     glBegin(GL_POLYGON);
  810.     glNormal3fv(N092);
  811.     glVertex3fv(P092);
  812.     glNormal3fv(N091);
  813.     glVertex3fv(P091);
  814.     glNormal3fv(N095);
  815.     glVertex3fv(P095);
  816.     glNormal3fv(N094);
  817.     glVertex3fv(P094);
  818.     glEnd();
  819.     glBegin(GL_POLYGON);
  820.     glNormal3fv(N091);
  821.     glVertex3fv(P091);
  822.     glNormal3fv(N092);
  823.     glVertex3fv(P092);
  824.     glNormal3fv(N094);
  825.     glVertex3fv(P094);
  826.     glNormal3fv(N095);
  827.     glVertex3fv(P095);
  828.     glEnd();
  829. }
  830.  
  831. void Whale007(void)
  832. {
  833.     glBegin(GL_POLYGON);
  834.     glNormal3fv(N030);
  835.     glVertex3fv(P030);
  836.     glNormal3fv(N031);
  837.     glVertex3fv(P031);
  838.     glNormal3fv(N039);
  839.     glVertex3fv(P039);
  840.     glNormal3fv(N038);
  841.     glVertex3fv(P038);
  842.     glEnd();
  843.     glBegin(GL_POLYGON);
  844.     glNormal3fv(N029);
  845.     glVertex3fv(P029);
  846.     glNormal3fv(N030);
  847.     glVertex3fv(P030);
  848.     glNormal3fv(N038);
  849.     glVertex3fv(P038);
  850.     glEnd();
  851.     glBegin(GL_POLYGON);
  852.     glNormal3fv(N029);
  853.     glVertex3fv(P029);
  854.     glNormal3fv(N038);
  855.     glVertex3fv(P038);
  856.     glNormal3fv(N037);
  857.     glVertex3fv(P037);
  858.     glEnd();
  859.     glBegin(GL_POLYGON);
  860.     glNormal3fv(N028);
  861.     glVertex3fv(P028);
  862.     glNormal3fv(N029);
  863.     glVertex3fv(P029);
  864.     glNormal3fv(N037);
  865.     glVertex3fv(P037);
  866.     glEnd();
  867.     glBegin(GL_POLYGON);
  868.     glNormal3fv(N028);
  869.     glVertex3fv(P028);
  870.     glNormal3fv(N037);
  871.     glVertex3fv(P037);
  872.     glNormal3fv(N036);
  873.     glVertex3fv(P036);
  874.     glEnd();
  875.     glBegin(GL_POLYGON);
  876.     glNormal3fv(N035);
  877.     glVertex3fv(P035);
  878.     glNormal3fv(N028);
  879.     glVertex3fv(P028);
  880.     glNormal3fv(N036);
  881.     glVertex3fv(P036);
  882.     glEnd();
  883.     glBegin(GL_POLYGON);
  884.     glNormal3fv(N035);
  885.     glVertex3fv(P035);
  886.     glNormal3fv(N036);
  887.     glVertex3fv(P036);
  888.     glNormal3fv(N043);
  889.     glVertex3fv(P043);
  890.     glEnd();
  891.     glBegin(GL_POLYGON);
  892.     glNormal3fv(N034);
  893.     glVertex3fv(P034);
  894.     glNormal3fv(N035);
  895.     glVertex3fv(P035);
  896.     glNormal3fv(N043);
  897.     glVertex3fv(P043);
  898.     glNormal3fv(N042);
  899.     glVertex3fv(P042);
  900.     glEnd();
  901.     glBegin(GL_POLYGON);
  902.     glNormal3fv(N033);
  903.     glVertex3fv(P033);
  904.     glNormal3fv(N034);
  905.     glVertex3fv(P034);
  906.     glNormal3fv(N042);
  907.     glVertex3fv(P042);
  908.     glEnd();
  909.     glBegin(GL_POLYGON);
  910.     glNormal3fv(N033);
  911.     glVertex3fv(P033);
  912.     glNormal3fv(N042);
  913.     glVertex3fv(P042);
  914.     glNormal3fv(N041);
  915.     glVertex3fv(P041);
  916.     glEnd();
  917.     glBegin(GL_POLYGON);
  918.     glNormal3fv(N031);
  919.     glVertex3fv(P031);
  920.     glNormal3fv(N032);
  921.     glVertex3fv(P032);
  922.     glNormal3fv(N039);
  923.     glVertex3fv(P039);
  924.     glEnd();
  925.     glBegin(GL_POLYGON);
  926.     glNormal3fv(N039);
  927.     glVertex3fv(P039);
  928.     glNormal3fv(N032);
  929.     glVertex3fv(P032);
  930.     glNormal3fv(N040);
  931.     glVertex3fv(P040);
  932.     glEnd();
  933.     glBegin(GL_POLYGON);
  934.     glNormal3fv(N032);
  935.     glVertex3fv(P032);
  936.     glNormal3fv(N033);
  937.     glVertex3fv(P033);
  938.     glNormal3fv(N040);
  939.     glVertex3fv(P040);
  940.     glEnd();
  941.     glBegin(GL_POLYGON);
  942.     glNormal3fv(N040);
  943.     glVertex3fv(P040);
  944.     glNormal3fv(N033);
  945.     glVertex3fv(P033);
  946.     glNormal3fv(N041);
  947.     glVertex3fv(P041);
  948.     glEnd();
  949. }
  950.  
  951. void Whale008(void)
  952. {
  953.     glBegin(GL_POLYGON);
  954.     glNormal3fv(N042);
  955.     glVertex3fv(P042);
  956.     glNormal3fv(N043);
  957.     glVertex3fv(P043);
  958.     glNormal3fv(N051);
  959.     glVertex3fv(P051);
  960.     glNormal3fv(N050);
  961.     glVertex3fv(P050);
  962.     glEnd();
  963.     glBegin(GL_POLYGON);
  964.     glNormal3fv(N043);
  965.     glVertex3fv(P043);
  966.     glNormal3fv(N036);
  967.     glVertex3fv(P036);
  968.     glNormal3fv(N051);
  969.     glVertex3fv(P051);
  970.     glEnd();
  971.     glBegin(GL_POLYGON);
  972.     glNormal3fv(N051);
  973.     glVertex3fv(P051);
  974.     glNormal3fv(N036);
  975.     glVertex3fv(P036);
  976.     glNormal3fv(N044);
  977.     glVertex3fv(P044);
  978.     glEnd();
  979.     glBegin(GL_POLYGON);
  980.     glNormal3fv(N041);
  981.     glVertex3fv(P041);
  982.     glNormal3fv(N042);
  983.     glVertex3fv(P042);
  984.     glNormal3fv(N050);
  985.     glVertex3fv(P050);
  986.     glEnd();
  987.     glBegin(GL_POLYGON);
  988.     glNormal3fv(N041);
  989.     glVertex3fv(P041);
  990.     glNormal3fv(N050);
  991.     glVertex3fv(P050);
  992.     glNormal3fv(N049);
  993.     glVertex3fv(P049);
  994.     glEnd();
  995.     glBegin(GL_POLYGON);
  996.     glNormal3fv(N036);
  997.     glVertex3fv(P036);
  998.     glNormal3fv(N037);
  999.     glVertex3fv(P037);
  1000.     glNormal3fv(N044);
  1001.     glVertex3fv(P044);
  1002.     glEnd();
  1003.     glBegin(GL_POLYGON);
  1004.     glNormal3fv(N044);
  1005.     glVertex3fv(P044);
  1006.     glNormal3fv(N037);
  1007.     glVertex3fv(P037);
  1008.     glNormal3fv(N045);
  1009.     glVertex3fv(P045);
  1010.     glEnd();
  1011.     glBegin(GL_POLYGON);
  1012.     glNormal3fv(N040);
  1013.     glVertex3fv(P040);
  1014.     glNormal3fv(N041);
  1015.     glVertex3fv(P041);
  1016.     glNormal3fv(N049);
  1017.     glVertex3fv(P049);
  1018.     glEnd();
  1019.     glBegin(GL_POLYGON);
  1020.     glNormal3fv(N040);
  1021.     glVertex3fv(P040);
  1022.     glNormal3fv(N049);
  1023.     glVertex3fv(P049);
  1024.     glNormal3fv(N048);
  1025.     glVertex3fv(P048);
  1026.     glEnd();
  1027.     glBegin(GL_POLYGON);
  1028.     glNormal3fv(N039);
  1029.     glVertex3fv(P039);
  1030.     glNormal3fv(N040);
  1031.     glVertex3fv(P040);
  1032.     glNormal3fv(N048);
  1033.     glVertex3fv(P048);
  1034.     glEnd();
  1035.     glBegin(GL_POLYGON);
  1036.     glNormal3fv(N039);
  1037.     glVertex3fv(P039);
  1038.     glNormal3fv(N048);
  1039.     glVertex3fv(P048);
  1040.     glNormal3fv(N047);
  1041.     glVertex3fv(P047);
  1042.     glEnd();
  1043.     glBegin(GL_POLYGON);
  1044.     glNormal3fv(N037);
  1045.     glVertex3fv(P037);
  1046.     glNormal3fv(N038);
  1047.     glVertex3fv(P038);
  1048.     glNormal3fv(N045);
  1049.     glVertex3fv(P045);
  1050.     glEnd();
  1051.     glBegin(GL_POLYGON);
  1052.     glNormal3fv(N038);
  1053.     glVertex3fv(P038);
  1054.     glNormal3fv(N046);
  1055.     glVertex3fv(P046);
  1056.     glNormal3fv(N045);
  1057.     glVertex3fv(P045);
  1058.     glEnd();
  1059.     glBegin(GL_POLYGON);
  1060.     glNormal3fv(N038);
  1061.     glVertex3fv(P038);
  1062.     glNormal3fv(N039);
  1063.     glVertex3fv(P039);
  1064.     glNormal3fv(N047);
  1065.     glVertex3fv(P047);
  1066.     glNormal3fv(N046);
  1067.     glVertex3fv(P046);
  1068.     glEnd();
  1069. }
  1070.  
  1071. void Whale009(void)
  1072. {
  1073.     glBegin(GL_POLYGON);
  1074.     glNormal3fv(N050);
  1075.     glVertex3fv(P050);
  1076.     glNormal3fv(N051);
  1077.     glVertex3fv(P051);
  1078.     glNormal3fv(N059);
  1079.     glVertex3fv(P059);
  1080.     glNormal3fv(N058);
  1081.     glVertex3fv(P058);
  1082.     glEnd();
  1083.     glBegin(GL_POLYGON);
  1084.     glNormal3fv(N051);
  1085.     glVertex3fv(P051);
  1086.     glNormal3fv(N044);
  1087.     glVertex3fv(P044);
  1088.     glNormal3fv(N059);
  1089.     glVertex3fv(P059);
  1090.     glEnd();
  1091.     glBegin(GL_POLYGON);
  1092.     glNormal3fv(N059);
  1093.     glVertex3fv(P059);
  1094.     glNormal3fv(N044);
  1095.     glVertex3fv(P044);
  1096.     glNormal3fv(N052);
  1097.     glVertex3fv(P052);
  1098.     glEnd();
  1099.     glBegin(GL_POLYGON);
  1100.     glNormal3fv(N044);
  1101.     glVertex3fv(P044);
  1102.     glNormal3fv(N045);
  1103.     glVertex3fv(P045);
  1104.     glNormal3fv(N053);
  1105.     glVertex3fv(P053);
  1106.     glEnd();
  1107.     glBegin(GL_POLYGON);
  1108.     glNormal3fv(N044);
  1109.     glVertex3fv(P044);
  1110.     glNormal3fv(N053);
  1111.     glVertex3fv(P053);
  1112.     glNormal3fv(N052);
  1113.     glVertex3fv(P052);
  1114.     glEnd();
  1115.     glBegin(GL_POLYGON);
  1116.     glNormal3fv(N049);
  1117.     glVertex3fv(P049);
  1118.     glNormal3fv(N050);
  1119.     glVertex3fv(P050);
  1120.     glNormal3fv(N058);
  1121.     glVertex3fv(P058);
  1122.     glEnd();
  1123.     glBegin(GL_POLYGON);
  1124.     glNormal3fv(N049);
  1125.     glVertex3fv(P049);
  1126.     glNormal3fv(N058);
  1127.     glVertex3fv(P058);
  1128.     glNormal3fv(N057);
  1129.     glVertex3fv(P057);
  1130.     glEnd();
  1131.     glBegin(GL_POLYGON);
  1132.     glNormal3fv(N048);
  1133.     glVertex3fv(P048);
  1134.     glNormal3fv(N049);
  1135.     glVertex3fv(P049);
  1136.     glNormal3fv(N057);
  1137.     glVertex3fv(P057);
  1138.     glEnd();
  1139.     glBegin(GL_POLYGON);
  1140.     glNormal3fv(N048);
  1141.     glVertex3fv(P048);
  1142.     glNormal3fv(N057);
  1143.     glVertex3fv(P057);
  1144.     glNormal3fv(N056);
  1145.     glVertex3fv(P056);
  1146.     glEnd();
  1147.     glBegin(GL_POLYGON);
  1148.     glNormal3fv(N047);
  1149.     glVertex3fv(P047);
  1150.     glNormal3fv(N048);
  1151.     glVertex3fv(P048);
  1152.     glNormal3fv(N056);
  1153.     glVertex3fv(P056);
  1154.     glEnd();
  1155.     glBegin(GL_POLYGON);
  1156.     glNormal3fv(N047);
  1157.     glVertex3fv(P047);
  1158.     glNormal3fv(N056);
  1159.     glVertex3fv(P056);
  1160.     glNormal3fv(N055);
  1161.     glVertex3fv(P055);
  1162.     glEnd();
  1163.     glBegin(GL_POLYGON);
  1164.     glNormal3fv(N045);
  1165.     glVertex3fv(P045);
  1166.     glNormal3fv(N046);
  1167.     glVertex3fv(P046);
  1168.     glNormal3fv(N053);
  1169.     glVertex3fv(P053);
  1170.     glEnd();
  1171.     glBegin(GL_POLYGON);
  1172.     glNormal3fv(N046);
  1173.     glVertex3fv(P046);
  1174.     glNormal3fv(N054);
  1175.     glVertex3fv(P054);
  1176.     glNormal3fv(N053);
  1177.     glVertex3fv(P053);
  1178.     glEnd();
  1179.     glBegin(GL_POLYGON);
  1180.     glNormal3fv(N046);
  1181.     glVertex3fv(P046);
  1182.     glNormal3fv(N047);
  1183.     glVertex3fv(P047);
  1184.     glNormal3fv(N055);
  1185.     glVertex3fv(P055);
  1186.     glNormal3fv(N054);
  1187.     glVertex3fv(P054);
  1188.     glEnd();
  1189. }
  1190.  
  1191. void Whale010(void)
  1192. {
  1193.     glBegin(GL_POLYGON);
  1194.     glNormal3fv(N080);
  1195.     glVertex3fv(P080);
  1196.     glNormal3fv(N081);
  1197.     glVertex3fv(P081);
  1198.     glNormal3fv(N085);
  1199.     glVertex3fv(P085);
  1200.     glEnd();
  1201.     glBegin(GL_POLYGON);
  1202.     glNormal3fv(N081);
  1203.     glVertex3fv(P081);
  1204.     glNormal3fv(N083);
  1205.     glVertex3fv(P083);
  1206.     glNormal3fv(N085);
  1207.     glVertex3fv(P085);
  1208.     glEnd();
  1209.     glBegin(GL_POLYGON);
  1210.     glNormal3fv(N085);
  1211.     glVertex3fv(P085);
  1212.     glNormal3fv(N083);
  1213.     glVertex3fv(P083);
  1214.     glNormal3fv(N077);
  1215.     glVertex3fv(P077);
  1216.     glEnd();
  1217.     glBegin(GL_POLYGON);
  1218.     glNormal3fv(N083);
  1219.     glVertex3fv(P083);
  1220.     glNormal3fv(N087);
  1221.     glVertex3fv(P087);
  1222.     glNormal3fv(N077);
  1223.     glVertex3fv(P077);
  1224.     glEnd();
  1225.     glBegin(GL_POLYGON);
  1226.     glNormal3fv(N077);
  1227.     glVertex3fv(P077);
  1228.     glNormal3fv(N087);
  1229.     glVertex3fv(P087);
  1230.     glNormal3fv(N090);
  1231.     glVertex3fv(P090);
  1232.     glEnd();
  1233.     glBegin(GL_POLYGON);
  1234.     glNormal3fv(N081);
  1235.     glVertex3fv(P081);
  1236.     glNormal3fv(N080);
  1237.     glVertex3fv(P080);
  1238.     glNormal3fv(N085);
  1239.     glVertex3fv(P085);
  1240.     glEnd();
  1241.     glBegin(GL_POLYGON);
  1242.     glNormal3fv(N083);
  1243.     glVertex3fv(P083);
  1244.     glNormal3fv(N081);
  1245.     glVertex3fv(P081);
  1246.     glNormal3fv(N085);
  1247.     glVertex3fv(P085);
  1248.     glEnd();
  1249.     glBegin(GL_POLYGON);
  1250.     glNormal3fv(N083);
  1251.     glVertex3fv(P083);
  1252.     glNormal3fv(N085);
  1253.     glVertex3fv(P085);
  1254.     glNormal3fv(N077);
  1255.     glVertex3fv(P077);
  1256.     glEnd();
  1257.     glBegin(GL_POLYGON);
  1258.     glNormal3fv(N087);
  1259.     glVertex3fv(P087);
  1260.     glNormal3fv(N083);
  1261.     glVertex3fv(P083);
  1262.     glNormal3fv(N077);
  1263.     glVertex3fv(P077);
  1264.     glEnd();
  1265.     glBegin(GL_POLYGON);
  1266.     glNormal3fv(N087);
  1267.     glVertex3fv(P087);
  1268.     glNormal3fv(N077);
  1269.     glVertex3fv(P077);
  1270.     glNormal3fv(N090);
  1271.     glVertex3fv(P090);
  1272.     glEnd();
  1273. }
  1274.  
  1275. void Whale011(void)
  1276. {
  1277.     glBegin(GL_POLYGON);
  1278.     glNormal3fv(N082);
  1279.     glVertex3fv(P082);
  1280.     glNormal3fv(N084);
  1281.     glVertex3fv(P084);
  1282.     glNormal3fv(N079);
  1283.     glVertex3fv(P079);
  1284.     glEnd();
  1285.     glBegin(GL_POLYGON);
  1286.     glNormal3fv(N084);
  1287.     glVertex3fv(P084);
  1288.     glNormal3fv(N086);
  1289.     glVertex3fv(P086);
  1290.     glNormal3fv(N079);
  1291.     glVertex3fv(P079);
  1292.     glEnd();
  1293.     glBegin(GL_POLYGON);
  1294.     glNormal3fv(N079);
  1295.     glVertex3fv(P079);
  1296.     glNormal3fv(N086);
  1297.     glVertex3fv(P086);
  1298.     glNormal3fv(N078);
  1299.     glVertex3fv(P078);
  1300.     glEnd();
  1301.     glBegin(GL_POLYGON);
  1302.     glNormal3fv(N086);
  1303.     glVertex3fv(P086);
  1304.     glNormal3fv(N088);
  1305.     glVertex3fv(P088);
  1306.     glNormal3fv(N078);
  1307.     glVertex3fv(P078);
  1308.     glEnd();
  1309.     glBegin(GL_POLYGON);
  1310.     glNormal3fv(N078);
  1311.     glVertex3fv(P078);
  1312.     glNormal3fv(N088);
  1313.     glVertex3fv(P088);
  1314.     glNormal3fv(N089);
  1315.     glVertex3fv(P089);
  1316.     glEnd();
  1317.     glBegin(GL_POLYGON);
  1318.     glNormal3fv(N088);
  1319.     glVertex3fv(P088);
  1320.     glNormal3fv(N086);
  1321.     glVertex3fv(P086);
  1322.     glNormal3fv(N089);
  1323.     glVertex3fv(P089);
  1324.     glEnd();
  1325.     glBegin(GL_POLYGON);
  1326.     glNormal3fv(N089);
  1327.     glVertex3fv(P089);
  1328.     glNormal3fv(N086);
  1329.     glVertex3fv(P086);
  1330.     glNormal3fv(N078);
  1331.     glVertex3fv(P078);
  1332.     glEnd();
  1333.     glBegin(GL_POLYGON);
  1334.     glNormal3fv(N086);
  1335.     glVertex3fv(P086);
  1336.     glNormal3fv(N084);
  1337.     glVertex3fv(P084);
  1338.     glNormal3fv(N078);
  1339.     glVertex3fv(P078);
  1340.     glEnd();
  1341.     glBegin(GL_POLYGON);
  1342.     glNormal3fv(N078);
  1343.     glVertex3fv(P078);
  1344.     glNormal3fv(N084);
  1345.     glVertex3fv(P084);
  1346.     glNormal3fv(N079);
  1347.     glVertex3fv(P079);
  1348.     glEnd();
  1349.     glBegin(GL_POLYGON);
  1350.     glNormal3fv(N084);
  1351.     glVertex3fv(P084);
  1352.     glNormal3fv(N082);
  1353.     glVertex3fv(P082);
  1354.     glNormal3fv(N079);
  1355.     glVertex3fv(P079);
  1356.     glEnd();
  1357. }
  1358.  
  1359. void Whale012(void)
  1360. {
  1361.     glBegin(GL_POLYGON);
  1362.     glNormal3fv(N058);
  1363.     glVertex3fv(P058);
  1364.     glNormal3fv(N059);
  1365.     glVertex3fv(P059);
  1366.     glNormal3fv(N067);
  1367.     glVertex3fv(P067);
  1368.     glNormal3fv(N066);
  1369.     glVertex3fv(P066);
  1370.     glEnd();
  1371.     glBegin(GL_POLYGON);
  1372.     glNormal3fv(N059);
  1373.     glVertex3fv(P059);
  1374.     glNormal3fv(N052);
  1375.     glVertex3fv(P052);
  1376.     glNormal3fv(N060);
  1377.     glVertex3fv(P060);
  1378.     glEnd();
  1379.     glBegin(GL_POLYGON);
  1380.     glNormal3fv(N059);
  1381.     glVertex3fv(P059);
  1382.     glNormal3fv(N060);
  1383.     glVertex3fv(P060);
  1384.     glNormal3fv(N067);
  1385.     glVertex3fv(P067);
  1386.     glEnd();
  1387.     glBegin(GL_POLYGON);
  1388.     glNormal3fv(N058);
  1389.     glVertex3fv(P058);
  1390.     glNormal3fv(N066);
  1391.     glVertex3fv(P066);
  1392.     glNormal3fv(N065);
  1393.     glVertex3fv(P065);
  1394.     glEnd();
  1395.     glBegin(GL_POLYGON);
  1396.     glNormal3fv(N058);
  1397.     glVertex3fv(P058);
  1398.     glNormal3fv(N065);
  1399.     glVertex3fv(P065);
  1400.     glNormal3fv(N057);
  1401.     glVertex3fv(P057);
  1402.     glEnd();
  1403.     glBegin(GL_POLYGON);
  1404.     glNormal3fv(N056);
  1405.     glVertex3fv(P056);
  1406.     glNormal3fv(N057);
  1407.     glVertex3fv(P057);
  1408.     glNormal3fv(N065);
  1409.     glVertex3fv(P065);
  1410.     glEnd();
  1411.     glBegin(GL_POLYGON);
  1412.     glNormal3fv(N056);
  1413.     glVertex3fv(P056);
  1414.     glNormal3fv(N065);
  1415.     glVertex3fv(P065);
  1416.     glNormal3fv(N006);
  1417.     glVertex3fv(P006);
  1418.     glEnd();
  1419.     glBegin(GL_POLYGON);
  1420.     glNormal3fv(N056);
  1421.     glVertex3fv(P056);
  1422.     glNormal3fv(N006);
  1423.     glVertex3fv(P006);
  1424.     glNormal3fv(N063);
  1425.     glVertex3fv(P063);
  1426.     glEnd();
  1427.     glBegin(GL_POLYGON);
  1428.     glNormal3fv(N056);
  1429.     glVertex3fv(P056);
  1430.     glNormal3fv(N063);
  1431.     glVertex3fv(P063);
  1432.     glNormal3fv(N055);
  1433.     glVertex3fv(P055);
  1434.     glEnd();
  1435.     glBegin(GL_POLYGON);
  1436.     glNormal3fv(N054);
  1437.     glVertex3fv(P054);
  1438.     glNormal3fv(N062);
  1439.     glVertex3fv(P062);
  1440.     glNormal3fv(N005);
  1441.     glVertex3fv(P005);
  1442.     glEnd();
  1443.     glBegin(GL_POLYGON);
  1444.     glNormal3fv(N054);
  1445.     glVertex3fv(P054);
  1446.     glNormal3fv(N005);
  1447.     glVertex3fv(P005);
  1448.     glNormal3fv(N053);
  1449.     glVertex3fv(P053);
  1450.     glEnd();
  1451.     glBegin(GL_POLYGON);
  1452.     glNormal3fv(N053);
  1453.     glVertex3fv(P053);
  1454.     glNormal3fv(N005);
  1455.     glVertex3fv(P005);
  1456.     glNormal3fv(N060);
  1457.     glVertex3fv(P060);
  1458.     glEnd();
  1459.     glBegin(GL_POLYGON);
  1460.     glNormal3fv(N053);
  1461.     glVertex3fv(P053);
  1462.     glNormal3fv(N060);
  1463.     glVertex3fv(P060);
  1464.     glNormal3fv(N052);
  1465.     glVertex3fv(P052);
  1466.     glEnd();
  1467. }
  1468.  
  1469. void Whale013(void)
  1470. {
  1471.     glBegin(GL_POLYGON);
  1472.     glNormal3fv(N066);
  1473.     glVertex3fv(P066);
  1474.     glNormal3fv(N067);
  1475.     glVertex3fv(P067);
  1476.     glNormal3fv(N096);
  1477.     glVertex3fv(P096);
  1478.     glNormal3fv(N097);
  1479.     glVertex3fv(P097);
  1480.     glEnd();
  1481.     glBegin(GL_POLYGON);
  1482.     glNormal3fv(N097);
  1483.     glVertex3fv(P097);
  1484.     glNormal3fv(N096);
  1485.     glVertex3fv(P096);
  1486.     glNormal3fv(N098);
  1487.     glVertex3fv(P098);
  1488.     glNormal3fv(N099);
  1489.     glVertex3fv(P099);
  1490.     glEnd();
  1491.     glBegin(GL_POLYGON);
  1492.     glNormal3fv(N065);
  1493.     glVertex3fv(P065);
  1494.     glNormal3fv(N066);
  1495.     glVertex3fv(P066);
  1496.     glNormal3fv(N097);
  1497.     glVertex3fv(P097);
  1498.     glEnd();
  1499.     glBegin(GL_POLYGON);
  1500.     glNormal3fv(N067);
  1501.     glVertex3fv(P067);
  1502.     glNormal3fv(N060);
  1503.     glVertex3fv(P060);
  1504.     glNormal3fv(N096);
  1505.     glVertex3fv(P096);
  1506.     glEnd();
  1507.     glBegin(GL_POLYGON);
  1508.     glNormal3fv(N060);
  1509.     glVertex3fv(P060);
  1510.     glNormal3fv(N005);
  1511.     glVertex3fv(P005);
  1512.     glNormal3fv(N096);
  1513.     glVertex3fv(P096);
  1514.     glEnd();
  1515.     glBegin(GL_POLYGON);
  1516.     glNormal3fv(N096);
  1517.     glVertex3fv(P096);
  1518.     glNormal3fv(N005);
  1519.     glVertex3fv(P005);
  1520.     glNormal3fv(N098);
  1521.     glVertex3fv(P098);
  1522.     glEnd();
  1523.     glBegin(GL_POLYGON);
  1524.     glNormal3fv(N006);
  1525.     glVertex3fv(P006);
  1526.     glNormal3fv(N065);
  1527.     glVertex3fv(P065);
  1528.     glNormal3fv(N097);
  1529.     glVertex3fv(P097);
  1530.     glEnd();
  1531.     glBegin(GL_POLYGON);
  1532.     glNormal3fv(N006);
  1533.     glVertex3fv(P006);
  1534.     glNormal3fv(N097);
  1535.     glVertex3fv(P097);
  1536.     glNormal3fv(N099);
  1537.     glVertex3fv(P099);
  1538.     glEnd();
  1539.     glBegin(GL_POLYGON);
  1540.     glVertex3fv(P005);
  1541.     glVertex3fv(P006);
  1542.     glVertex3fv(P099);
  1543.     glVertex3fv(P098);
  1544.     glEnd();
  1545. }
  1546.  
  1547. void Whale014(void)
  1548. {
  1549.     glBegin(GL_POLYGON);
  1550.     glNormal3fv(N062);
  1551.     glVertex3fv(P062);
  1552.     glNormal3fv(N004);
  1553.     glVertex3fv(P004);
  1554.     glNormal3fv(N005);
  1555.     glVertex3fv(P005);
  1556.     glEnd();
  1557.     glBegin(GL_POLYGON);
  1558.     glVertex3fv(P006);
  1559.     glVertex3fv(P005);
  1560.     glVertex3fv(P004);
  1561.     glVertex3fv(P008);
  1562.     glEnd();
  1563.     glBegin(GL_POLYGON);
  1564.     glNormal3fv(N063);
  1565.     glVertex3fv(P063);
  1566.     glNormal3fv(N006);
  1567.     glVertex3fv(P006);
  1568.     glNormal3fv(N002);
  1569.     glVertex3fv(P002);
  1570.     glEnd();
  1571.     glBegin(GL_POLYGON);
  1572.     glNormal3fv(N002);
  1573.     glVertex3fv(P002);
  1574.     glNormal3fv(N006);
  1575.     glVertex3fv(P006);
  1576.     glNormal3fv(N008);
  1577.     glVertex3fv(P008);
  1578.     glEnd();
  1579.     glBegin(GL_POLYGON);
  1580.     glNormal3fv(N002);
  1581.     glVertex3fv(P002);
  1582.     glNormal3fv(N008);
  1583.     glVertex3fv(P008);
  1584.     glNormal3fv(N004);
  1585.     glVertex3fv(P004);
  1586.     glEnd();
  1587.     glBegin(GL_POLYGON);
  1588.     glNormal3fv(N062);
  1589.     glVertex3fv(P062);
  1590.     glNormal3fv(N002);
  1591.     glVertex3fv(P002);
  1592.     glNormal3fv(N004);
  1593.     glVertex3fv(P004);
  1594.     glEnd();
  1595. }
  1596.  
  1597. void Whale015(void)
  1598. {
  1599.     glBegin(GL_POLYGON);
  1600.     glNormal3fv(N055);
  1601.     glVertex3fv(P055);
  1602.     glNormal3fv(N003);
  1603.     glVertex3fv(P003);
  1604.     glNormal3fv(N054);
  1605.     glVertex3fv(P054);
  1606.     glEnd();
  1607.     glBegin(GL_POLYGON);
  1608.     glNormal3fv(N003);
  1609.     glVertex3fv(P003);
  1610.     glNormal3fv(N055);
  1611.     glVertex3fv(P055);
  1612.     glNormal3fv(N063);
  1613.     glVertex3fv(P063);
  1614.     glEnd();
  1615.     glBegin(GL_POLYGON);
  1616.     glNormal3fv(N003);
  1617.     glVertex3fv(P003);
  1618.     glNormal3fv(N063);
  1619.     glVertex3fv(P063);
  1620.     glNormal3fv(N100);
  1621.     glVertex3fv(P100);
  1622.     glEnd();
  1623.     glBegin(GL_POLYGON);
  1624.     glNormal3fv(N003);
  1625.     glVertex3fv(P003);
  1626.     glNormal3fv(N100);
  1627.     glVertex3fv(P100);
  1628.     glNormal3fv(N054);
  1629.     glVertex3fv(P054);
  1630.     glEnd();
  1631.     glBegin(GL_POLYGON);
  1632.     glNormal3fv(N054);
  1633.     glVertex3fv(P054);
  1634.     glNormal3fv(N100);
  1635.     glVertex3fv(P100);
  1636.     glNormal3fv(N062);
  1637.     glVertex3fv(P062);
  1638.     glEnd();
  1639.     glBegin(GL_POLYGON);
  1640.     glNormal3fv(N100);
  1641.     glVertex3fv(P100);
  1642.     glNormal3fv(N063);
  1643.     glVertex3fv(P063);
  1644.     glNormal3fv(N002);
  1645.     glVertex3fv(P002);
  1646.     glEnd();
  1647.     glBegin(GL_POLYGON);
  1648.     glNormal3fv(N100);
  1649.     glVertex3fv(P100);
  1650.     glNormal3fv(N002);
  1651.     glVertex3fv(P002);
  1652.     glNormal3fv(N062);
  1653.     glVertex3fv(P062);
  1654.     glEnd();
  1655. }
  1656.  
  1657. void Whale016(void)
  1658. {
  1659.     glBegin(GL_POLYGON);
  1660.     glVertex3fv(P104);
  1661.     glVertex3fv(P105);
  1662.     glVertex3fv(P106);
  1663.     glEnd();
  1664.     glBegin(GL_POLYGON);
  1665.     glVertex3fv(P107);
  1666.     glVertex3fv(P108);
  1667.     glVertex3fv(P109);
  1668.     glEnd();
  1669.     glBegin(GL_POLYGON);
  1670.     glVertex3fv(P110);
  1671.     glVertex3fv(P111);
  1672.     glVertex3fv(P112);
  1673.     glVertex3fv(P113);
  1674.     glVertex3fv(P114);
  1675.     glVertex3fv(P115);
  1676.     glEnd();
  1677.     glBegin(GL_POLYGON);
  1678.     glVertex3fv(P116);
  1679.     glVertex3fv(P117);
  1680.     glVertex3fv(P118);
  1681.     glVertex3fv(P119);
  1682.     glVertex3fv(P120);
  1683.     glVertex3fv(P121);
  1684.     glEnd();
  1685. }
  1686.  
  1687.  
  1688. void DrawWhale(fishRec *fish)
  1689. {
  1690.     float seg0, seg1, seg2, seg3, seg4, seg5, seg6, seg7;
  1691.     float pitch, thrash, chomp;
  1692.  
  1693.     fish->htail = (int)(fish->htail - (int)(5.0 * fish->v)) % 360;
  1694.  
  1695.     thrash = 70.0 * fish->v;
  1696.  
  1697.     seg0 = 1.5 * thrash * sin((fish->htail)*RRAD);
  1698.     seg1 = 2.5 * thrash * sin((fish->htail+10.0)*RRAD);
  1699.     seg2 = 3.7 * thrash * sin((fish->htail+15.0)*RRAD);
  1700.     seg3 = 4.8 * thrash * sin((fish->htail+23.0)*RRAD);
  1701.     seg4 = 6.0 * thrash * sin((fish->htail+28.0)*RRAD);
  1702.     seg5 = 6.5 * thrash * sin((fish->htail+35.0)*RRAD);
  1703.     seg6 = 6.5 * thrash * sin((fish->htail+40.0)*RRAD);
  1704.     seg7 = 6.5 * thrash * sin((fish->htail+55.0)*RRAD);
  1705.  
  1706.     pitch = fish->v * sin((fish->htail-160.0)*RRAD);
  1707.  
  1708.     chomp = 0.0;
  1709.     if (fish->v > 2.0) {
  1710.     chomp = -(fish->v - 2.0) * 200.0;
  1711.     }
  1712.  
  1713.     P012[1] = iP012[1] + seg5;
  1714.     P013[1] = iP013[1] + seg5;
  1715.     P014[1] = iP014[1] + seg5;
  1716.     P015[1] = iP015[1] + seg5;
  1717.     P016[1] = iP016[1] + seg5;
  1718.     P017[1] = iP017[1] + seg5;
  1719.     P018[1] = iP018[1] + seg5;
  1720.     P019[1] = iP019[1] + seg5;
  1721.  
  1722.     P020[1] = iP020[1] + seg4;
  1723.     P021[1] = iP021[1] + seg4;
  1724.     P022[1] = iP022[1] + seg4;
  1725.     P023[1] = iP023[1] + seg4;
  1726.     P024[1] = iP024[1] + seg4;
  1727.     P025[1] = iP025[1] + seg4;
  1728.     P026[1] = iP026[1] + seg4;
  1729.     P027[1] = iP027[1] + seg4;
  1730.  
  1731.     P028[1] = iP028[1] + seg2;
  1732.     P029[1] = iP029[1] + seg2;
  1733.     P030[1] = iP030[1] + seg2;
  1734.     P031[1] = iP031[1] + seg2;
  1735.     P032[1] = iP032[1] + seg2;
  1736.     P033[1] = iP033[1] + seg2;
  1737.     P034[1] = iP034[1] + seg2;
  1738.     P035[1] = iP035[1] + seg2;
  1739.  
  1740.     P036[1] = iP036[1] + seg1;
  1741.     P037[1] = iP037[1] + seg1;
  1742.     P038[1] = iP038[1] + seg1;
  1743.     P039[1] = iP039[1] + seg1;
  1744.     P040[1] = iP040[1] + seg1;
  1745.     P041[1] = iP041[1] + seg1;
  1746.     P042[1] = iP042[1] + seg1;
  1747.     P043[1] = iP043[1] + seg1;
  1748.  
  1749.     P044[1] = iP044[1] + seg0;
  1750.     P045[1] = iP045[1] + seg0;
  1751.     P046[1] = iP046[1] + seg0;
  1752.     P047[1] = iP047[1] + seg0;
  1753.     P048[1] = iP048[1] + seg0;
  1754.     P049[1] = iP049[1] + seg0;
  1755.     P050[1] = iP050[1] + seg0;
  1756.     P051[1] = iP051[1] + seg0;
  1757.  
  1758.     P009[1] = iP009[1] + seg6;
  1759.     P010[1] = iP010[1] + seg6;
  1760.     P075[1] = iP075[1] + seg6;
  1761.     P076[1] = iP076[1] + seg6;
  1762.  
  1763.     P001[1] = iP001[1] + seg7;
  1764.     P011[1] = iP011[1] + seg7;
  1765.     P068[1] = iP068[1] + seg7;
  1766.     P069[1] = iP069[1] + seg7;
  1767.     P070[1] = iP070[1] + seg7;
  1768.     P071[1] = iP071[1] + seg7;
  1769.     P072[1] = iP072[1] + seg7;
  1770.     P073[1] = iP073[1] + seg7;
  1771.     P074[1] = iP074[1] + seg7;
  1772.  
  1773.     P091[1] = iP091[1] + seg3 * 1.1;
  1774.     P092[1] = iP092[1] + seg3;
  1775.     P093[1] = iP093[1] + seg3;
  1776.     P094[1] = iP094[1] + seg3;
  1777.     P095[1] = iP095[1] + seg3 * 0.9;
  1778.  
  1779.     P099[1] = iP099[1] + chomp;
  1780.     P098[1] = iP098[1] + chomp;
  1781.     P064[1] = iP064[1] + chomp;
  1782.     P061[1] = iP061[1] + chomp;
  1783.     P097[1] = iP097[1] + chomp;
  1784.     P096[1] = iP096[1] + chomp;
  1785.  
  1786.     glPushMatrix();
  1787.  
  1788.     glRotatef(pitch, 1.0, 0.0, 0.0);
  1789.  
  1790.     glTranslatef(0.0, 0.0, 8000.0);
  1791.  
  1792.     glRotatef(180.0, 0.0, 1.0, 0.0);
  1793.  
  1794.     glScalef(3.0, 3.0, 3.0);
  1795.  
  1796.     glEnable(GL_CULL_FACE);
  1797.  
  1798.     Whale001();                                                 
  1799.     Whale002();                                                 
  1800.     Whale003();                                                 
  1801.     Whale004();                                                 
  1802.     Whale005();                                                 
  1803.     Whale006();                                                 
  1804.     Whale007();                                                 
  1805.     Whale008();                                                 
  1806.     Whale009();                                                 
  1807.     Whale010();                                                 
  1808.     Whale011();                                                 
  1809.     Whale012();                                                 
  1810.     Whale013();                                                 
  1811.     Whale014();                                                 
  1812.     Whale015();                                                 
  1813.     Whale016();                                                 
  1814.  
  1815.     glDisable(GL_CULL_FACE);
  1816.  
  1817.     glPopMatrix();
  1818. }
  1819.